home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / docs / lists / DevGuide.lha / DevGuide / MyCheck < prev    next >
Encoding:
AmigaDOS Script File  |  1998-10-18  |  1.4 KB  |  45 lines
  1. .key file/A
  2. .BRA {
  3. .KET }
  4.  
  5. FailAt 50
  6. Echo "*NCheck:       {file}"
  7. RAM:DVC {file} info >ENV:Check1
  8. ; Abfangen wenn DVC nix gefunden hat
  9. If "$Check1" GT ""
  10.    rx RAM:MyConvert.rexx $Check1
  11. else
  12.    rx RAM:MyConvert.rexx {file}
  13. Endif
  14. If NOT WARN
  15.     RAM:Search RAM:DeviceList.dvc :$file NONUM >ENV:Check2
  16.     rx MyCheck.rexx $Checktemp1,$Check2
  17.     If NOT WARN
  18.         If "$Checkdev1" EQ "$Checkdev2"
  19.             SetEnv CheckErg=" is OK!"
  20.         else
  21.             If "$Checkdev1" GT "$Checkdev2"
  22.                 SetEnv CheckErg=" NEW !!! Please contact age@thepentagon.com!"
  23.                Echo "*N----------------------------------------------------------" >>Ram:Lib-NewList
  24.                 Echo "*N{file}" >>Ram:Dev-NewList
  25.                 c:List "{file}" LFormat="Name: %n*NSize: %l" >>Ram:Dev-NewList
  26.                 Echo "*NC:Version means:" >>Ram:Dev-NewList
  27.                 Version "{file}" FULL FILE >>Ram:Dev-NewList
  28.                 Echo "*NDVC means:" >>Ram:Dev-NewList
  29.                 DVC "{file}" INFO >>Ram:Dev-NewList
  30.                 Echo "*NYOUR COMMENT:" >>Ram:Dev-NewList
  31.             else
  32.                 SetEnv CheckErg=" Newer Device is available!"
  33.               Echo "Your System: $Check1 -> DeviceGuide: $Check2" >>Ram:Dev-OldList
  34.                 c:List "{file}" LFormat="%n|%l" >ENV:Lister
  35.             Echo "$Lister|$Version" >>Ram:Dev-OnlineUpdate
  36.             EndIf
  37.         EndIf
  38.         Echo "DeviceGuide: $Check2 *NYour System: $Check1 $CheckErg"
  39.         Echo "DeviceGuide: $Check2 *NYour System: $Check1 $CheckErg*N" >>Ram:Dev-List
  40.     else
  41.         Echo "{file}"
  42.         Echo "$Check1 *N{file} ??.??" >>Ram:Dev-List
  43.     EndIf
  44. EndIf
  45.